home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / dsattrs.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  2.5 KB  |  77 lines

  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'DSAttrS.pas' rev: 3.00
  6.  
  7. #ifndef DSAttrSHPP
  8. #define DSAttrSHPP
  9. #include <LibHelp.hpp>
  10. #include <DRIntf.hpp>
  11. #include <StdCtrls.hpp>
  12. #include <ExtCtrls.hpp>
  13. #include <Dialogs.hpp>
  14. #include <Forms.hpp>
  15. #include <Controls.hpp>
  16. #include <Graphics.hpp>
  17. #include <Classes.hpp>
  18. #include <Messages.hpp>
  19. #include <Windows.hpp>
  20. #include <SysUtils.hpp>
  21. #include <SysInit.hpp>
  22. #include <System.hpp>
  23.  
  24. //-- user supplied -----------------------------------------------------------
  25.  
  26. namespace Dsattrs
  27. {
  28. //-- type declarations -------------------------------------------------------
  29. class DELPHICLASS TSaveAttributesAs;
  30. class PASCALIMPLEMENTATION TSaveAttributesAs : public Forms::TForm 
  31. {
  32.     typedef Forms::TForm inherited;
  33.     
  34. __published:
  35.     Stdctrls::TComboBox* BasedOnList;
  36.     Stdctrls::TEdit* AttributeNameEdit;
  37.     Stdctrls::TLabel* Label1;
  38.     Stdctrls::TLabel* Label2;
  39.     Stdctrls::TButton* OKBtn;
  40.     Extctrls::TBevel* Bevel1;
  41.     Stdctrls::TButton* CancelBtn;
  42.     Stdctrls::TButton* HelpBtn;
  43.     void __fastcall OKBtnClick(System::TObject* Sender);
  44.     void __fastcall CancelBtnClick(System::TObject* Sender);
  45.     void __fastcall HelpBtnClick(System::TObject* Sender);
  46.     void __fastcall FormCreate(System::TObject* Sender);
  47.     
  48. private:
  49.     void __fastcall AddToList(const System::AnsiString Value);
  50.     
  51. public:
  52.     bool __fastcall Execute(const System::AnsiString TableName, const System::AnsiString FieldName, System::AnsiString 
  53.         &AttributesName, Drintf::TAttrID &BasedOnID);
  54. public:
  55.     /* TCustomForm.Create */ __fastcall virtual TSaveAttributesAs(Classes::TComponent* AOwner) : Forms::
  56.         TForm(AOwner) { }
  57.     /* TCustomForm.CreateNew */ __fastcall TSaveAttributesAs(Classes::TComponent* AOwner, int Dummy) : 
  58.         Forms::TForm(AOwner, Dummy) { }
  59.     /* TCustomForm.Destroy */ __fastcall virtual ~TSaveAttributesAs(void) { }
  60.     
  61. public:
  62.     /* TWinControl.CreateParented */ __fastcall TSaveAttributesAs(HWND ParentWindow) : Forms::TForm(ParentWindow
  63.         ) { }
  64.     
  65. };
  66.  
  67. //-- var, const, procedure ---------------------------------------------------
  68. extern PACKAGE bool __fastcall SaveAttributesAsDlg(const System::AnsiString TableName, const System::AnsiString 
  69.     FieldName, System::AnsiString &Name, Drintf::TAttrID &BasedOnID);
  70.  
  71. }    /* namespace Dsattrs */
  72. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  73. using namespace Dsattrs;
  74. #endif
  75. //-- end unit ----------------------------------------------------------------
  76. #endif    // DSAttrS
  77.